home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / progrmng / mlpmodul.sit / MacLogimoPlus Documentation / DEF3 Files / DeskMgr.DEF < prev    next >
Encoding:
Modula Definition  |  1990-06-14  |  1.2 KB  |  31 lines  |  [TEXT/PMED]
  1. DEFINITION MODULE DeskMgr;   (* Christoph Fleischer 07.02.85 *)
  2.                              (* MacIntosh Toolbox Desk Manager Routines *)
  3.                              (* last modification   27.07.85 fxk*)
  4.  
  5. FROM MacBase IMPORT StrPtr,LongInt;
  6. FROM EventMgr IMPORT EventRecord;
  7. FROM WindowMgr IMPORT WindowPtr;
  8.  
  9. EXPORT QUALIFIED
  10.   cutCmd,copyCmd,pasteCmd,undoCmd,clearCmd,
  11.   SystemEvent,SystemClick,SystemTask,SystemMenu,SystemEdit,OpenDeskAcc,CloseDeskAcc;
  12.  
  13.  
  14. CONST
  15.   cutCmd    =  0;
  16.   copyCmd   =  1;
  17.   pasteCmd  =  2;
  18.   undoCmd   =  3;
  19.   clearCmd  =  4;
  20.  
  21.  
  22. PROCEDURE SystemEvent(myEvent: EventRecord): BOOLEAN;                 (*INLINE $A9B2*)
  23. PROCEDURE SystemClick(theEvent: EventRecord; theWindow: WindowPtr);   (*INLINE $A9B3*)
  24. PROCEDURE SystemTask;                                                 (*INLINE $A9B4*)
  25. PROCEDURE SystemMenu(menuResult: LongInt);                            (*INLINE $A9B5*)
  26. PROCEDURE SystemEdit(editCode: INTEGER): BOOLEAN;                     (*INLINE $A9C2*)
  27. PROCEDURE OpenDeskAcc(theAcc: StrPtr): INTEGER;                       (*INLINE $A9B6*)
  28. PROCEDURE CloseDeskAcc(refNum: INTEGER);                              (*INLINE $A9B7*)
  29.  
  30. END DeskMgr.
  31.